Нарисовать вложенные окружности- QBasic(Бейсик)

CLS
SCREEN 9
FOR i = 1 TO 5
    r = 27 * i
    CIRCLE (r, 175), r, , , , 1
NEXT

Тестирование выполнено в программе QB64 ( Скачать )

Leave a Comment